rm -rf datos.dat
snort -ve -r $1/tcpdump | perl pre.pl $1/tcpdump.list tipos_default.dat
exit;
